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function fli = makeji (codeword_descriptor) 
% function fli = makeji (codeword_descriptor) 
% Synthesize a scaled 16 by 1 FLI codeword. 
% 0 <= codeword_descriptor < 4096 

% select the octal digits from the codeword descriptor 

10 = bitand (codeword_descriptor, -7); 

11 = bitand (bitshift (codewortd_descriptor, -3), 7); 

12 = bitand (bitshift (codeword_descriptor, -6), 7); 

13 = bitand (bitshift (codeword_descriptor, -9), 7); 
generatingVector = [10, i1, 12, i3] % generating vector 

% the following kronecker basis function provides 4096 total codes 
% and is based on an 8-star constellation 
h = [... 

1.1923+0.2372j, 2.0960+0.4169], 1.1923+0.2372], 2.0960+0.41 69j. ... 
1.1923+0.2372], 2.0960+0.4169], 1.1923+0.2372], 2.0960+0.4169]; ... 
2.0960+0.41 69], 0.6754+1 .01 08j,-0.41 69+2.0960],-1 .01 08+0.6754], ... 
-2.0960+0.41691,-0.6754-1.0108], 0.4169-2.0960], 1.0108-0.6754]; 

% make the kronecker codeword 

fli = 1; 

for]]=1:4 

fli = kron (h(:, generatingVector(]])+1), % matlab is one based 

end 

% quantize the codeword 
fli = round (fli); 
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% fls_super_results_12.m 

% Lower 12 bits are the base tones, upper 4 bits are the superframe tones. 
% First index (row) is the base, second (column) is the superframe 



Codeword = [ ... 

23125 39509 27221 55893 6741 43605 47701 10837 51797 31317 59989 19029 
40269 36173 64845 44365 56653 11597 48461 15693 27981 60749 52557 32077 
47781 60069 27301 15013 10917 39589 51877 2725 35493 19109 43685 55973 
13669 54629 5477 34149 62821 21861 9573 38245 42341 46437 30053 50533 
27309 10925 55981 43693 47789 51885 6829 35501 15021 191 7 39597 23213 
2 813 38197 34101 5429 42293 54581 9525 62773 46389 17717 50485 58677 
27477 56149 11093 43861 19285 39765 6997 23381 52053 35669 6024547957 
42389 17813 46485 50581 21909 1429 9621 62869 30101 45677 26005 58773 
42709 38613 46805 14037 18133 50901 5845 22229 54997 59093 34517 30421 
38217 46409 25929 42313 5449 9545 50505 13641 54601 17737 21833 30025 
4693 12885 21077 16981 53845 41557 49749 62037 45653 29269 25173 37461 
59049 34473 5801 9897 54953 13993 26281 18089 38569 42665 46761 50857 



% 5A55 9A55 6A55 DA55 1A55 AA55 BA55 2A55 CA55 7A55 EA55 4A55 
% 9D4D 8D4D FD4D AD4D DD4D 2D4D BD4D 3D4D 6D4D ED4D CD4D 7D4D 
% BAA5 EAA5 6AA5 3AA5 2AA5 9AA5 CAA5 0AA5 8AA5 4AA5 MA5 DM5 
% 3565 D565 1565 8565 F565 5565 2565 9565 A565 B565 7565 C565 
% 6AAD 2AAD DAAD AAAD BAAD CAAD 1 AAD 8AAD 3AAD 4AAD 9AAD 5AAI2 
% 5535 9535 8535 1535 A535 D535 2535 F535 B535 4535 C535 E535 
% 6B55 DB55 2B55 AB55 4B55 9B55 1B55 5B55 CB55 8B55 EB55 BB55 
% A595 4595 B595 C595 5595 0595 2595 F595 7595 0595 6595 E595 
% A6D5 96D5 B6D5 36D5 46D5 C6D5 16D5 56D5 D6D5 E6D5 86D5 76D5 
% 9549 B549 6549 A549 1549 2549 C549 3549 D549 4549 5549 7549 
% 1255 3255 5255 4255 D255 A255 C255 F255 B255 7255 6255 9255 



Nb = 
Ns = 
Nt = 


12; % Number of tones in base 
4; % Number of tones in superframe sequence 
16; % Total number of tones 


) 
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function fis = mal<e_fls (base, superframe) 

% function fIs = mal<e_lls (base, superframe) 

% base is the base offset code and varies from 0 to 11 

% superiframe is the slot sequence number and varies from 0 to 11 

fls_super_results_12 % read in the codeword descriptor array 

t = zeros (Nt,1); 
forjj=1:Nt 

t(jj) = 2"(ij-1); % form a vector of walking ones 

end 

cw = codeword (base+1, superframe+1); % select codeword descriptor 
bv = (bitandCcw.t) ~= 0) * 2 - 1 ; % make BPSK vector 
fis = (1 5 + 1 5j) * bv; % scale the BPSK vector 
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